Public Class EAsignatura
    'Private mcodigo As Integer
    Private mDescripcion As String
    Private mhorascatedra As String
    Private mActivo As Integer
    Private ListaDeTrimestres As List(Of Entidades.ETrimestre)
    Private ListaDeCursadas As List(Of Entidades.ECursada)

    Public Property Descripcion() As String
        Get
            Return mDescripcion
        End Get
        Set(ByVal value As String)
            mDescripcion = value
        End Set
    End Property

    Public Property HorasCatedra() As String
        Get
            Return mhorascatedra
        End Get
        Set(ByVal value As String)
            mhorascatedra = value
        End Set
    End Property

    Public Property Activo() As Integer
        Get
            Return mActivo
        End Get
        Set(ByVal value As Integer)
            mActivo = value
        End Set
    End Property

    Public Sub New()
        Reset()
    End Sub
    Public Sub Reset()
        mDescripcion = ""
        mhorascatedra = ""
        mActivo = 0
    End Sub
End Class
